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PREFACE 



As (he Computer Age gathers momentum, more and more people are becoming aware 
of the latest dramatic development the microcomputer. To take full advantage of these 
incredibly powerful new tools, you n«*ed to be able to wnte programs. The easiest and most 
effective way to learn programming is by actually using the computer yourself, to get 
"hands-on" experience. 

This manual is designed to help you learn computer programming on the System 80 
Computer, using the "hands-on" approach. It provides a comprehensive software course, 
based on the Active Commands. Text Editing and program statements available in the 
System 80 powerful Level XL BASIC language. 

To get the most from the manual, we suggest very strongly that you read it from the 
first page to the last, without skipping any portion of the text or any of the numerous 
examples given Not only that, but we suggest that you try' each example for yourself on 
the System 80 computer as you go along. That way. you should really have a good grasp 
of programming by the time you reach the last page 



Happy and effective computing with your System 80' 
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INTRODUCTION 



In The System 80. ihere are four operating levels 

(1) The Active Command Level In this level, the computer responds to commands as 
soon as they are entered followed by hitting the NEW LINE key. Whenever the >. 
signs are on the display, the user is in the Active Command level. (Hor more details 
sec Chapter I). 

(2) The Program Execution level This level is entered by typing RUN. and the BASIC 
program in the memory is executed All numeric variables are set to zero and all string 
variables are set to null before execution starts, that is right after the RUN command 
is entered. (For more detail see the RUN command in Chapter 1). 

(3) The Text Kditing level This level allows the user to modify, delete and add the 
content of the program in the memory. The user can change any part of the program 
text as desired, instead of retyping the entire program line. 

(see Chapter 2) 

*4) The Monitor level: This level permits the user to load machine language "object files" 
into memory These object files (either program or data) can be accessed by other 
BASK programs, or executed independently, 
(see the SYSTHM command in Chapter I ). 



Before going into program coding, wc should be familiar with some basic concepts of 
programming. 

I . Keywords: There is a set of keywords (reserved words which form the skeleton of a 
program in Extended Basic. Some of the keywords are: 

PRINT 

INPUT 

IF 

THEN 

GOTO 

END 

For the entire list of keywords, please refer to Appendix A. The keywords act as the guide- 
line of a program. 



For example 



I " 1 

i-0 r PRINT "ADO TWO NUMBERS PROGRAM 



20 

30 

40 

50 
60 



r - INPUT "ENTER THE FIRST NUMBER \ fl 



■- INPUT "ENTER THE SECOND NUMBER 
» "" 



R + B 



j- print "the result is 
"Lend i -*- • 



»c 



-- 



LINE NOS. 



KEYWORDS 



SECONDARY PART OF STATEMENTS 



All this program does is to accept two numbers, add Ihem together, and print out the result. 

REflDV 
>RUN 

fiOO TWO NUMBERS PROGRAM : 
ENTER THE FIRST NUMBER ? 42 
ENTER THE SECOND NUMBER 7 45 
THE RESULT IS 87 

2. Variables Do you remember your mai! box number* 1 

Of course, right! The mad box number serves as a label which identifies itself from the 
others, so the postman can put the right letter to the right box. 

The variable names (or identifiers) in a program function exactly like the mail box number. 
However, the variables use figurative names instead of numbers. 

Let us consider the following events 
A = 170 




vartabh 



(«> 




tbl 



In event (a), when the computer executes the assignment statement A - 170. it searches the 
location of variable A. and put the value of 1 70 into A's content. Just like in event (b), once 
the postman sees the address on the letter, he will bring the letter to the mail box 456, in 
ELM street. Simple. right! 
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With the same process, consider ihe following program. 

10 ft " 1 REM FILL THE CON It NT OF ft WITH 1 

20 ft * ft + 10 REM ADO IB TO ft, STORE THE RESULT IN ft 

20 B = ft * 2 REM ft X Z, STORE THE RESULT IN B 

40 PRINT "THE RESULTS ARE ".fl, B 

50 END REM END OF PROGRAM 



A 1 




A , || 




A I II 


b :: 



line 10 
line 20 
line 30 

READV 
^RUN 

THE RESULTS RRE 11 



So far we only deal with variables that contain numbers; actually, variables may contain 
strings (one or more characters). 

However, these variables are a little bit different from numeric variables. 



10 ft* - "MR JOHN HDflMS, " 

20 B* = "P. BOX 456, " 

38 C* - "ELM STREET " 

40 PRINT ft* 

50 PRINT B*, C* 

60 END 



READY 
.RUN 

MR JOHN ADAMS, 

P BOX 456, ELM STREET 
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This program assigns "MR. JOHN ADAMS,*', "P.O. BOX 456,", "ELM STREET." to AS. 
B$, CS respectively. Then print out the contents of AS. BS and CS onto the screen. 
Note that there is a J sign following A. B and C. The "J" tells the computer that vari- 
ables AS. BS. and CS are string variables (variables that contain letters, symbols, as well as 
non — computational numbers) The value must be enclosed in double quotation marks. For 
example: DS = "ABCDE 1 2345 • - /+" 

Note that if you assign the wrong thing to the wrong variable, the computer will not under- 
stand and will give you an error message. 



For example 

A - "WRONG DATA" (assign a string value to a numeric variable) 

BS = 100 (assign a numeric value to a string variable) 

Besides, variable names must be unique. Just like two mail boxes cannot bear the same 
number. 

The System 80 accepts variable names which are longer than two characters, however, only 
the first two characters are used by the computer to distinguish between other variables 
Variable names must begin with a letter (from A to Z) and followed by another letter or 
a digit (from to 9). The following are valid and distuict variables: 

A. AA. AB. AC, A0. Al . BN. BZ. B7.ZZ, ZI. 

Note The user should not use any variable name which contains words with special meaning 
(or reserved words) in the BASIC language. For example. "(.'IF" cannot be used as a variable 
name, since it contains the BASIC keyword "IF". 
A list of reserved words is in Appendix A. 



7 



Variable Types 

Then: are lour lypes of variables in the System 80 integer, single precision, double precision, 
and string variables. The first ihree types arc used to store numeric values, whereas the 
last type is used only tor character storage. 

1. %: integer (whole numbers within the range -32769 to +32769) 

Example 

A% = -30 
BB% = 8000 

2. ! : single precision (6 significant digits) 

Example 

A ! = - 50.3 
D4! = .123456 

3 # . double precision ( 16 significant digits) 
Example 

A** = 3.141592653589 
A2# = -4567.8901234 

4. S : string (maximum length : 255 characters) 

Example 

AS - "SYSTEM 80" 

M2S= THE RESULT OF<A B B+l5)/2.5 IS:" 

Though A%. A!, A/* , AS all have the same variable name "A", their types are different, 
that is%, !,# , S; they are considered to be distinct variables by the computer. 

Arithmetic Operators 

Whenever any computation is needed in a program the arithmetic operators are used. 

Example: 

5 R = 6 

18 R * R * 3 1416 +2 REM COMPUTE THE CIRCUMFERENCE 

28 PRINT "THE CIRCUMFERENCE IS n .H 

38 B - 3 1416 * R C 2 REM COMPUTE THE RREfl OF THE CIRCLE 
40 PRINT "THE AREA IS "-B 

58 END 

READY 
>RUN 

THE CIRCUMFERENCE IS 37 6992 
THE RRER IS 113 898 
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The System 80 uses the general arithmetic symbols. 

+ for addition, - for subtraction, • for multiplication, / for division, and [ (the ESC key) for 

exponentiation. 

For example, the result of 5 x 12*' is equivalent to the result of S • 12 ( ( i /3> in 
System 80 (Note, you will find no I key on the keyboard, it is represented by the ESC 

key). 

Relational Operators 

Whenever a decision has to be made within a program, a relational operator is needed. 
The acceptable operators are: 

< (less than) < ■ (less than or equal to) 

> (greater than) > ■ (greater than or equal to) 

<> (not equal) = (equal to) 

Example 

128 IF R < B THEN PRINT "B IS GREATER TURN A " 

When the computer executes this statement, if the content of B is greater than the content 
of A (i.e. A < B is true), the sentence "B IS GREATER THAN A" will be printed on the 
screen Otherwise the computer will just go to the next statement 



Logical Operators 

AND. OR. and NOT are the only logical operators accepted by the System 80. 

Example 

18IFR = lfWDB-5 GOTO 58 

Tnc computer branches to line 50 if A = 1 and B - 5, otherwise the computer goes to the 
next statement following line 10 



20 A * <B = 2> AND (C > 10) 

A has the value of -1 . if both B = 2 and C> 10 are irue 
Otherwise A has the value of 0. 



46 A = (0 < 2) OR (E < 20) 



A has the value of -1 if either D < 2 or E < 20 is true. When both D > - 2 and E > = 20 are 



true, then A has the value of 0. 



70 A = NOT <F > 5) 

A has the value of -1 if F< = 5. 
Otherwise A has the value of 0, 



Siring Operators. 

In string operations, the relational operators are used to compare the precedence of two 
strings. 

Note that the following operations are all true. 



"B" < "C* 
-JOHN." > "JACK" 

"STRING" - "STRING" 

"LETTERS" <> "LETTERS 
ft* = -B0" + "AT" 



< THE CODE FOR B IS LESS THAN THE CODE FOR 
( SAME REASON AS ABOVE ) 



( SPACE ALSO COUNTS ) 
C A* WILL HAVE THE VALUE 



BOAT ) 



Order of Operations 

Operations in the innermost level of parentheses are performed first, then evaluation 
proceeds to the next level, etc Operations on the same level are performed according to the 
following precedence rules. 



1. Exponentiation 

2. Negaiion 

3. Multiplication and Division 

4. Addition and Subtraction 

5. Relational Operators 

6. Logical Operators 



A I B 
-C 

A*B.C/D 
C+D.E-F 

A< B,'r = r.l5<> 16 
NOT, AND. OR 
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For example, we have a formula . 

The computer win evaluate in the following sequence. 

If A - 2 

B - 3 

C = 4 

D m 5 

E m 6 



Then apply to the formula above 
2 + 3*4* 5/2 +6C2 



12 • 

1 


5 
1 






« 


"1 






f + 


30 


« C 

1 

f 


] 


32 

1 


+ 





ee 



Therefore the answer should be 



n 



CHAPTER 1 



ACTIVE COMMANDS 

Once Ihe system is set up. with power on. the user should be in the Active Command level 
The normal indication is the word "READY" followed by a ' > " sign which appears on 
the next line at the upper left comer on the display (monitor or TV screen). For convenience 
we will call this indication the "ready message" 

At this point, the user should hit the lNEW LINEl kev before entering one of the following 
commands through the keyboard 



1. 


AUTO 


8. 


EDIT 


IS. 


LLIST 


2. 


CLEAR 


9. 


LIST 






3. 


CLOAD 


10 


NEW 






4, 


CLOAD? 


11. 


RUN 






5. 


CONT 


12. 


SYSTEM 






6. 


CSAVE 


13. 


TROFF 






7. 


DELETE 


14 


IRON 







We are going to discuss these commands separately. Please note that everything inside the 
brackets is optional. For example: AUTO (line number, increment) All the user has to do is 
type in the underlined portion. 

flUTQ 10. 5 

or any numeric value to replace "line number" and "increment" In case the option is not 
taken, just type in 

LIST 

The computer will perform certain s pecified ac tions automatically. Notice Every command 
should be followed by pressing thejNEWTlNElkey. 
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1.1 AUTO (line number, increment) 

This command automatically sets the line numbers before each source line is entered. 
The option permits the user to specify the beginning line number as well as t he in- 
crement desired between lines If the user only types in AUTO followed by thelNEW 
! INEjkev, the heginning fttfl numbei Will ttC Mr) at 10, with each increment ol 10 
The user may enter his program statement right after the line number. 



Example 



30 PRINT "THIS IS LINE 38 



Everytime the use r hits th e [NEW LINE key, the computer will increment the line 
number. Until the|BREAK)key is hit, the AUTO command will remain in operation. 
(Note that whenever AUTO brings up a line that has been used previously, there will 
be an asterisk appear right next to the line number. If the user does not want to alter 
that line, hit the lBREA& lkey *° turn off the AUTO function). 



Example 



READY 
>ftUT0 1.2 




1 LINE 1 


NEW LINK 


3 LINE 3 

5 LINE 5 
7 LINE ? 
9 [BREAK! 
RERDY 
>BUT0 2,2 


1 


2 SECOND LINE 
4 FORTH LINE 
6 SIXTH LINE 

afaRESKl 

RERDY 
>ftUT0 


1 NEW LINE 


10 LINE 10 
20 LINE 20 
30 LINE i0 

*0©5E.AK| 

READY 
>RUT0 1,1 


NEW LINE 


1+ 


NEW LINE 


2* 

3* 

4* 
5* 


1 
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1.2 CLEAR (number of byles) 

The command will clear a specific number of bytes for string storage If the option is 



not used i.e. type in CLEAR followed by the NEW LINE] key. the computer will 
reset all numeric variables to zero, and all string variables to null. When the option is 
taken, the command will perform, in addition to the first function, a second function: 
that is to clear a specified number of bytes for string storage. Note that when the user 
turns on the computer, a CLEAR 50 command is performed automatically. 

Example 

CLEAR 100 

Reset ail numeric variables to zero, and all string variables to null Then clears 100 
bytes ot memory for string storage. 
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1.3 CLOAD (* - cassette number, "file name") 

The command will load a specified program according to the "file name" to the 
computer from the appropriate cassette Before using this command, the user should 
re-wind the cassette tape, check the cables and connectors (consult the user's manual 1, 
press the PLAY button on the cassette. 11 e verything is ready, type in. for example 
CLOAD* -1. "A" then hit the lNEW LINE I key, The cassette will be turned on and 
starts searching until the file named "A" is found. II the file is lound. a 
stable and a blinking asterisks will appear at the top right corner of the display io 
indicate loading is carrying out. Once the entire program has been loaded in the 
computer, the READY message will appear on the display 



Example 



CLOflD •-!< 



•<■-. ■• 



Load from cassette No. I the file named "3". 

Note that only the first character of the file name is used lor CLOAD, CLOAD* 1 . and 

("SAVE commands. 

1 4 CLOAD? (file name! 

This command will compare a specific program stored on cassette tape with the one 
in the computer's main memory. Usually, this command is used right after the 
CSAVE command which stores a program from the computer's main memory to a 
cassette The CLOAD? command allows the user to examine whether the copying 
(CSAVE) operation is successful. 

It is a good practice to include the file name in this command, since the computer will 
search for that file, or program, before comparison starts. Otherwise the first file 
encountered on the cassette will be compared During the operation, the program on 
tape and the program in memory are compared byte by byte If any part does not 
match, the message "BAD" will be display. In this case, the user should repeat the 
CSAVE command again Same as CLOAD Command, the cassette must he re-w ound, 
cables and connectors checked, with the iPLAYj button on. prior hitting the SNEW 
LINE] key, (consult User's Manual tor more details) 

I 5 CONT 

This command continues the program execution, at the point where the execution 
has been stopped by thejy&EAKlkey or a STOP statement within the program. 
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6 CSAVEc -cassette number, "file name" 

This command stores the program in the computer's main memory onto cassette tape 
Both the cassette number and the file name must be accompanied with this command 
Any alphanumeric character other than double guotes ("I will be acceptable as a file 
name. Again, before using the command, the cassette tape must be in a proper start- 
ing location (not overlapped with any useful program location) Check the cables 
and connectors, press the PLAY and REC buttons of the cassette at the same time, 
then start typing the command accordingly. 

Example 

CSflVE »-2- "C" 

Saves a program with label "C" on cassette drive 2. from the main memory 
Warning keep account of the locations of the saved programs on tape Find an empty 
space for the new program to be loaded, unless you want to erase the old programs. 
Erased program are not recoverable. (Consult user's manual for more details*. 



!,7 DELETE line number (line number) 

This command will clear the memory location that contains the specified lineis). 

Example 

DELETE 5 Clear line S 

DELETE 7-18 Clear line 7 line. 10 and any line in between. 

DELETE -12 Clear from the first line of the program, up to and including line 12. 

DELETE . Clear the line currently entered, or edited. 

1 .8 EDIT line number 

This command will cause the computer to shift from the Active Command level to the 
Editing level In the Editing level, the user is allowed to examine and modify the pro- 
gram statements in the main memory, by using a set of sub-commands There must be 
a valid line number tollowing the EDIT command, otherwise the command may not 
be accepted Also see Chapter 2. 

Example 

EDIT 20 

Turns the computer from Active Command level to Editing level then examines 
line 20 
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1.9 LIST Mine number line number! 

This command will inform the computer to display any specified program lines stored 
in the main memory. II the option is not used, the computer will scroll the entire 
program onto the display In order to pause and examine the text, the user should hit 
the lSHlPr ;ini1 '" k<-'>' s simultaneously. The scrolling will continue by rutting any key. 



Example 



LIST 3 display line 3. 

LIST 18 - 28 display line 10, line 20 and any line in between. 

LIST -58 display from the first line up to and include line 50 

LIST 28 - display line 20 and all following lines. 

LIST display the current line just entered or edited. 

LIST display all lines in the memory. 



1. 10 NEW 



This command will clear all program lines; reset numeric variables to zero and string 
variables to null. It does not change the memory size previously set by the CLEAR 

command. 



1.1 1 RUN (line number) 

This command will instruct the computer to start executing (or RUN) the user's pro- 
gram stored in main memory If a line number is not specified, the computer will 
start executing from the lowest line number. However, if a line number is provided, 
the computer will execute from the given line number to higher order lines. Note 
that an error will occur if an invalid line number is used 
Every time a RUN is executed, a CLfcAR command also executed automatically 

before it. 



Example 



RUN 58 start executing at line 50 

bun start executing at the lowest number line. 
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1.12 SYSTEM 



This command lurns the computer into the Monitor Mode Within this mode, the 
user may load his own program or data file in machine c ode format 
To load an object tile from tape, type in SYSTEM and 1NEW LINE ; the '"""symbol 
will be displayed. Then type in the file name. The tape will begin loading. When 
loading is completed, another "*'"' will appear. Type in a slash ","' symbol followed 
by the entry point address (in decimal) where the user wants the execution to start. 
If the user does not type in the entry address, execution will begin at the address 
specified b> the object file. 



1. 1 J TROFF 



This command will turn off the Trace function. Usually follows the TRON 

command. 



1.14 TRON 



This command will turn on a Trace function that allows the user to keep track of the 
program flow for debugging and execution analysis. Every time the computer executes 
a new program line, the line number will be displayed inside a pair of brackets. 

Example 

the following program 

1 +*" 



Consider the following program 




16 


PRINT " ** PROGRAM 




^0 


n a I 




S0 


IF ft = 3 THEN 79 




40 


PRINT ft 




50 


ft = fi + 1 




60 


GOTO 30 




70 


PRINT " END PROGRAM 




80 


END 


Type 


in 






>TS 
>Rl 


:CW NEW LlNEl 








.IN (NEW LINE 



aa> m program i *» 

<28X30X40> 1 

<50X60X38X48> 2 
<50><60X30X70> END PROGRAM 1 
<80> 
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In order lo pause execution before its nalural end. thclS HIFTJ and <& keys must be 
pressed simultaneously. To continue, just press any key 

To turn off the Trace function, enter TROFF TRON and TROFF are available for 
use within user programs to check if a given line is executed. 

Example 



90 IF fl = B THEN 169 

100 TRON 

110 A = B + C 

128 TROFF 



In this portion of a program, if A happens to be not equal to B. then line 1 10 should 
be executed. By using TRON and TROFF inside the program, the user can see 
precisely whether line 1 10 has been executed or not. The computer will display <J 10> 
<120>if these lines were executed. TRON and TROFF can be removed after a pro- 
gram is debugged 



1 IS LUST 

Lists a program onto the printer This command functions in a very similar way as 
the LIST command. If the Line printer is not properly connected, the computer will 
enter a dead loop and waits to print the first character This situation can only be 
resolved by turning the printer on or hitting the RESET button. 
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CHAPTER 2 



TEXT EDITING 

The purpose of editing in the System 80 is to facilitate the user in modi tying his programs 

With the Editor, the user need not to type in the entire program every time he makes a 

programming mistake or typing error The need for an editor becomes more critical when 

programs are long and complex. 

Inside this chapter we discuss every editing function, including subcommands, that 

available tor the System 80. A substantial amount of descriptive examples are presented 

with each command Users are advised to try out each editing command before entering 
their first program into the system. 

2.1 EDIT line number 

This command shifts the computer from the Active Command level to the Editing 
level. The user must specify which line he wants to edit. If the line number is not pro- 
vided, an PC error will occur (see Appendix B). 



Example 



EDIT 186 (allow to edit line 100) 

EDIT. (allow to edit the current line just entered.) 



2.2 NEW LINE Key 

Once the user presses the^EW J-1NEJ key while in the Edit mode, the computer will 
record all the changes made in thai line, and return back to the Active Command level. 



2.3 n | Space-barj Key 

In the Edit mode, pressing the space-bar will move the cursor one space to the right 
and display any character stored in the preceding position. The user may type in the 

value of n before hitting the Space-bar, then the cursor will move n spaces to the right 

side. 

Suppose we have entered a line into the computer by the command 

>flUT0 10© 

100 IF ft = 8 THEN 150 A = fl + 1 GOTO 100 
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If the user wants to edit this line, he should type in EDIT 100 followed by the lNEW 
EIHEIkey. like the following: 



>EDIT 186 



then the display will become 

180- 

By pressing the Space-bar 12 times, the cursor will move to the right side by 12 
spaces. The display should look like 

180 IF R = B THE- 

The user may also use the option to display more c haracters a l once. That is. enter 
the number of cursorspacesdesired, before hitting the |Space-b arj 

Example 

Type in 8 followed hy lhe lSpace-bar| key: 

100 IF R = 6 THE- 

The display will become 

190 IF R = B THEN 150 : _ 



If the user wants to display the next 20 positions, he may type 20 then the Space-bar 
The outcome should be: 

100 IF R ■ B THEN 158 fl * fl ♦ 1 : GOTO 186- 



2.4 n Backspace' Key 



This action will move the cursor back to the left by n spaces. If number n is not 
specified, the cursor only moves back one space at a time Everything behind the 
cursor will disappear from the display, however, it is not erased from the memory. 

Example 

108 IF R = B THEN 158 H = R ♦ 1 GOTO 108 

Hit the [Backspace] key 5 times, the display will look like 

100 IF R = B THEN 158 R = R + 1 G0T_ 
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Then type in 10 followed by Backspace key. the display will look like 
100 IF fl = B THEN 150 A = fi- 



Afler this sequence of operations, if the user hits the NEW LINEj key, the display 
will look like. 

> - 
That means the computer has relumed back to the Active Command level. If any 
further change is desired in line 100. the user must enter the Edit mode again. 



2.5 



[SHIFT 


ESC 



Kev 



By pressing the SHIFT and ESC] keys simultaneously, the computer will escape from 
any ol the following Insert subcommands: H. 1. X. After escaping from an Insert sub- 
command, the user remains in the Editing level, while the current cursor position is 
. Another way to escape from these Insert subcommands, is by pressing the 
key. which will shift the computer back to the Active Command level 




2.6 [H] Key 



'■}[" represents Hack and Insert, that is to delete remainder of the line and to let the 
user insert material al the current cursor position. 

Example 
Consider this line 

100 IF fl = 6 THEN 150 fl = fl ♦ 1 GOTO 100 

If the user wants lo replace A = A + I by A = A + B. and to delete GOT O 100, he 
should first enter the Editing level, type in 25 followed by pressing the Space-bar] 
(move 25 spaces from the beginning of the line). The display should look like 



100 IF R = B THEN 150 ft = fl_ 



Now hit the H key, type in + B. then hit |NEW LlNEl tback to the Active Command 
level). Or hit [SHIFT) and |ESCl simultaneous!) to return to Editing level, then hit[E| to 
display the entire line, as below 



100 IF fl = 6 THEN 150 

100- 

with anything not displayed being deleted 



ft = ft + B 
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2.7 |TJKey 



"I" represents Insert, thai is to allow insertion of characters starting at the current 
cursor position, without altering any other part ot the line. 

Example 

We want to insert the statement "PRINT A" between "A = A + 1" and "GOTO 1 00" 
inline 100. Line 100 looks like 

100 IF ft = B THEN 158 ft = ft + 1 GOTO 100 



By using the EDIT mode and the Space-bar Move the cursor to 



100 IF ft = B THEN 150 ft = ft + 1 - 

Now hit the I key. type in "PRINT A .", then press thc!5fflE]>ndE0kcys to escape 
from the subcommand level, At this point we can type infL|to list ihe current line. 
And the display should look like. 

100 IF ft = 6 THEN 156 A = ft + 1 PRINT ft GOTO 100 

100- 

or we can hit the [NEW LINEike> to return to the Active Command level. 



2.8 X Key 



"X" represents Insert at End of Line The command moves the cursor position to the 
end of the line, and shifts the computer into the Insert subcommand The user can 
ins ert new ma terials at the end of the line, or delete part of the existing line by using 

the (Backspace] key 

Example 

Gel into the Edit mode 

>EDIT 100 

100- 
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Type in X wilhoul hithng JNEW LlNEi key. The line displayed should be 

100 IF fl = B then 156 R = fl + 1 PRINT R . GOTO 106 

100- 

Al this point, the use r m ay ad d some new material, or delete part of the existing line, 

before hitting^H]FTdnd|£SC 



2.9 [U] Key 

"L" represents List line. While the computer is in the Editing level, and is not 
currently executing one of the subcommands H. I. X .the I- command will list the 
remaining part of the line onto the display 

Example 

>HDIT 100 

100- 

HitQ3< without hittingHEHfflB. the display should be: 

106 IF ft = 8 THEN 150 fl • fl * 1 PRINT fl GOTO 100 

180- 

The second line allows the user to do editing, while referencing the first line 

2.10 [A] Key 

"A" represents Cancel and Restart. In the Editing level this command moves the 
cursor back to (he beginning of the line, cancels all editing changes previously made 
on that line, and restores the former content of the line. 






2.11 [EjKey 



This command shifts the computer from Editing level back to the Active Command 
level, and saves all the changes previously made Make sure the computer is not 
executing any subcommand before entering E. 
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2.12 Q Key 



This command shifts the computer from Editing level back to the Active Command 
level, but cancel all the changes made in the current edit mode. Just type in Q to 
cancel the changes made and return to the Active Command level. 



2.13 n[H Key 



"D" represents delete, the command will delete n numbers of characters right after 
the current cursor position. The deleted characters will be enclosed in exclamation 
marks '*!" to show you which characters arc being affected. 

Example 

Consider the following line 

160 IF ft - B TMtN 156 ft » ft + i PRINT ft GOTO 1&6 
We first enter into the Editing level, move the cursor to the following position 

166 IF ft = B THEN 156 ft = ft ♦ 1 
Now type in 15D(to delete 15 characters), the display should look like; 
166 IF ft = 6 THEN 156 ft = ft ♦ 1' PRINT ft GO 1 

Then use L to list the entire line, the display should become: 

160 IF ft = B THEN 150 ft ■ A ♦ 1' PRINT ft GO' TO 106 
160 _ 

List Again: 

160 Ir ft = B THEN 156 ft = ft ♦ 1T0 100 

166- 
Now use the X key and the Backspace key to delete "TO 100"; the final outcome 
should be: 

160 IF ft = B THEN 150 ft = ft + i 



2.14 n|C]Key 



"G M represents change; the command allows the user to change n number of characters 
right after the current cursor position. If the number n is not specified, the computer 
assumes the user only wants to change a single character. 
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Example 
Consider the line 

m IF ft = B THEN 156 R = fl + 1 

If the user wants to change ISO to 230, he should enter the Edit mode and move 
the cursor to the following position: 

189 IF fl = 8 THEN 

No w type in 2 C (ch ange the next 2 characters), followed by 23 (new data), then hit 
the iSHIFTI and [ESCI kevs. List the line by hittingfQ 



188 IF fl = B THEN 238 R = fl + 1 
180 _ 



2.15 dBJc 



The command searches for the n th occurrance of the character c on that line and 
moves the cursor to thai position. If the n value is not provided, the computer Will 
search for the first occurrance of the character specified and stop the cursor there. In 
case the specified character is not found, the cursor will move to the end of the line. As 
usual, the computer will start searching from the current cursor position toward the 
right end of the line. 
Consider the following example: 

108 IF fl = B THEN 23* : ft - ft * 1 

After entering the Edit mode, the display should look like 

188- 

Now type in 2S ■ . to inform the computer to search for the second occurrance of the 
equal sign "=", and the final display should be 

188 IF fl = B THEN 238 fl _ 

Now, the user may enter one of the subcommands at the current cursor position. For 

example 

Type in H (hack and insert) followed by **» A + 2" (new data). 

Then the line will become. 

180 IF fl = B THEN 238 A = A ♦ 2 _ 
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2.16 n m c 



The command will delete all characters up to the n th occurrence of character C. and 
move the cursor to that position. Consider the following example: 

106 IF ft = B THEN 236 A = A ♦ 2 
Enter into the Edit mode: 

166 _ 

Now type in IK:, to inform the computer to search for the first occurrance of the 
colon " " symbol, then delete everything in front of it on that line. 
The display should become 

166 'IF A = B THEN 238 ! 
The ":" should also be deleted so type in D, the display will become 

180 < IF A = B THEN 230 ! ! : .' 
Then hit the L key to list the line on the display. The line should look like 

166 A = A + 2 

100- 
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HAPTER 3 



BASIC PROGRAMMING STATEMENTS 



In this Chapter, we are going to discuss the program statements in our BASK language The 
first part of this chapter covers all the Input-Output statements available lor the computer 
to communicate with the outside world, essentially through the keyboard and video display, 
as well as storing to and retrieving from cassette tapes. 

The second part of this chapter concerns vanOus functions of all the programming 
statements in BASIC which are acceptable to the System 80. Since it is a very large set 
of statements, and each statement has its own unique and characteristics in programming, 
the users are advised to study each statement with the help of the examples provided. 



INPUT - OUTPUT STATEMENTS: 



i.l PRINT item list 

Prints an item or a list of items on»the display Item may be any of the tollowing 

ii Sum enc ronstanis (numbers suobfts-G, S6S72 02. 541 

b) Numeric variables (names representing numeric values, such as X. V. Z, etc.) 

c> String constants (characters enclosed in quotes, such as "HOMh COMPITER". 

*003'\elc> 
dl String variables i names representing string or character values, such as AS. BS, etc.) 
e) Expressions ta sequence of any combination 01 the above, such as tX + 101/Y. 

■BALL" + "PEN'", etc) 
Items in the item list may be separated hy commas or semi-colons. If commas are used, 
the cursor automatically advances to the next printing /one belore printing the next 
item II semi-colons are used, no space is inserted between alphabetic items before 
printing on the display, but one space is inserted before each numeric item 



Fxample 



19 N = 35 ♦ 7 
£& PRINT "25 + 
29 EM 



IS EOUftL TO "-N 
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READY 
>RUN 

25 ♦ 7 IS EQUAL TO 32 



Example 

10 HS = "HOME " 
20 C* - COMPUTER" 

38 PRINT TRY OUR ",H$,C* 
40 END 

READY 
>RUN 

TRS OUR HOME COMPUTER 



When commas are used to separate items. 4 columns are acceptable per line. Each 
column consists of a maximum of 16 characters. Any string beyond this bound will 
be printed on the next line. 

Example 

10 PRINT "COLUMN 1", "COLUMN 2". "COLUMN Z", "COLUMN 4". "COLUMN 5" 
20 END 

READY 
>RUN 

COLUMN 1 COLUMN 2 COLUMN I COLUMN 4 

COLUMN 3 

If two or more commas are applied together, each comma will still occupy 16 
characters. (Blank spaces). 



Example 



10 PRINT "COLUMN 1". . "COLUMN 2" 
20 END 

READY 
>RUN 

COLUMN 1 COLUMN 2 
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Note the following examples: 



10 PRINT 
20 PRINT 

38 END 


"LINE 
"LINE 


ONE'- 
TWO" 


RERDV 

>RUN 






LINE ONE 
LINE TWO 






18 PRINT 
20 PRINT 
3fl END 


"LINE 

"LINE 


ONE"> 
TWO" 


REftDV 
>RUN 






LINE ONE 




Lire TWO 



3.2 PRINTS location, item list 

This statement prints out items in the item list at the screen location specified. The 
"t*" sign must follow PRINT immediately, and the location specified must be a 
number of value from to 1023. For more details on the display map. please refer 
to Appendix E. 

Example 

20 PRINT W.00, "LOC 100" 

If the user constructs a PRINT® statement to print on the bottom line of the diplay. 
there wUl be an automatic line-feed, causing everything displayed to move up one 
line To suppress this action, add a semi-colon at the end of the statement. 

Example 

10 PRINT 9 999 , "BOTTOM LINE". 
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3 J PRINT TAB( expression) 

Allows !he user to print at any specified cursor position within a line. If the tab 
position is greater than 63 the next line will be used. More than one TAB in a PRINT 
statement is acceptable. However, the value in the expression must be between and 
255 inclusive. 



Example 



18 PRINT TRBae> "POSITION 19" TflB<30> "POSITION 36" 
20 END 

READY 
MBJN 

POSITION 10 POSITION 30 

10 N * 4 

20 PRINT TflB(N) "POS ".N Tf©<N*10> "POS ".N+10 TflB<N+20> "POS ".N+20 

30 END 

RE ROY 

>RUN 

POS. 4 POS 14 POS 24 



3.4 PRINT USING format, item list 

This statement allows the user to print the data with a pre-defined format. The data 
can be numeric or string values. 

The format and item list in PRINT USINC. statement can be expreoed as variables or 
constants. The statement prints the item list according to the format specified. 

The following specifiers may be used in the format field. 

# This sign represents the proper position of each digit in the item list (for numeric 

value) The number of # signs used forms the format desired. If the format field is 
greater than the numeric value (in the item list), the unused field positions to the left 
of the number will be displayed as spaces and those to the right of the decimal point 
will be displayed as zeros 

The decimal point can be placed anywhere in the format field established by the # 
signs. Rounding off will take place if the digits to the right of the decimal point are 

suppressed. 

The comma - When it is placed at any position between the first digit and the 

decimal point, a comma will be displayed to the right of every three digits. 
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Let us consider the following examples 

18 INPUT '-ENTER FORMAT \ F* 
28 IF F* - "STOP" END 
30 INPUT "ENTER fl NUMBER \N 
40 PRINT USING F«, N 

50 GOTO 10 
This program requests inputs for the format field and item hat (in this case with 
numeric value). The program will stop only if the user inputs the word "STOP" as the 
value for F$. 

Now try to run this program 

READV 
>RUN 

ENTER FORMAT *>## M 

ENTER fl NUMBER *> 12 34 
12 34 

ENTER FORMAT «»« «« 
ENTER A NUMBER *> 12 34 
12 34 

ENTER FORMAT ?»# *« 
ENTER A NUMBER ? 123 45 
Z123 45 
ENTER FORMAT ">STOP 

The % sign will be automatically printed out if the field is not large enough to contain 
the number of digits found in the numeric value. The entire number to the lett of the 
decimal point will be displayed after the % sign. 

Let us run tne program again. 

READV 
>RUN 

ENTER FORMAT ?ftfl •« 

ENTER A NUMBER *> 12 345 

12 35 

ENTER FORMAT ?STOP 

Since only two decimal places were specified, the numeric value will be rounded-oiT 
before displaying to the screen. 
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(i) •• Two asterisks placed at the beginning of the format field will cause all 
unused positions to the left of the decimal point to be filled with asterisks. 
The two asterisks will establish two more positions in the field. 

(li) SS Two dollar signs placed at the beginning of the field will act as a floating 
dollar sign. That is A dollar sign will occupy the first position preceding the 
number. 

(lii) ••$ Combines the effects of *• and SS. Any empty position to the left of the 
number will be filled by the * sign and the S sign will also occupy the first 
position preceding the number. 
Let us use the same example as before 

REAOV 
>RUN 

ENTER FORMRT "'**•» tH 
ENTER A NUMBER 7 12. 3 

**i2 se 

ENTER FORMRT ->**»« #« 
ENTER ft NUMBER ? 12 34 

*12 34 
ENTER FORMAT ">***#»* »« 
ENTER A NUMBER * 12 34 
****12 34 

ENTER FORMRT 'STOP 



(iv> 4 When a "+" sign is placed at the beginning or at the end of the format field. 
the computer will print a + sign lor a positive number or a - sign for a 
negative number at the specific position accordingly. 

(v) - When a "- ' sign is placed at Ihc end of the format field, it will cause a 
negative sign to be pnnted after any negative number, and will display as a 
blank for positive numbers. 

Examples (using the same program as above) 

RERDV 
>RUN 

ENTER FORMRT ->«••#. • 
ENTER A NUMBER ? 12345. 6 
12.346 
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ENTER FORMRT "'*•« ■* 

ENTER ft NUMBER ? 12 34 

+12 34 

ENTER FORMAT ^+it •• 

ENTER ft NUMBER ?~12 34 

-12. 34 

ENTER FORMAT ?*• •«♦ 

ENTER fl NUMBER ">-12 34 

12. 34- 

ENTER FORMAT ^$9 #•- 

ENTER fl NUMBER ? 12 34 

12 34 

ENTER FORMAT ?#« *** 

ENTER fl NUMBER ? 12345b 

Z123456 000 

ENTER FORMAT >STOP 

(vi) % space % 

To define a string Held of more than one character. The length of the format field 
will he 2 plus the number of spaces hetween the percentage signs. An exclamation 
mark (!) informs the computer to use only the first character of the current string value. 

Consider the following program example; 

10 INPUT "ENTER FORMRT ";F$ 

20 IF F* * "STOP" END 

30 INPUT -ENTER A STRING "..C* 

48 PRINT USING F$, C* 

50 QQTQ 10 



This program performs similarilv to the one we just used. The only difference is that. 
the user has to input a string value instead of a numeric value for the second data 
entry This is, the variable ('$. 
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Now let us run the program and test its function. 

READY 

>RUN 

ENTER FORMAT ?! 
ENTER A STRING ">ABCDE 

R 

ENTER FORMAT *>V. 'A 

ENTER R STRING >ABCDE 

BBC 

ENTER FORMAT 7K X 

ENTER A STRING '>ABCDEF 

ABCDE 

ENTER FORMAT ^STOP 

(vii) I By using the I sign, we can also concatenate, or join strings together. 
Example 

19 INPUT "ENTER THREE STRINGS B ,A*,B*.C* 

20 PRINT "THE RESULT IS ", PRINT USING " ' ", A*, B*. C* 

38 END 



Now. run the program. 

READY 

>RUN 

ENTER THREE STRINGS '■■ABC- XVZ, UK 

THE RESULT IS AXI 

ENTER THREE STRINGS ?A. COMPUTER, PROGRAM 
THE RESULT IS ACP 



By using more than one "!" signs, the first letter of each string will be printed with 
spaces inserted corresponding to the spaces inserted between the "!" signs. 
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Try lo follow this example. 

10 INPUT "ENTER THREE STRINGS ",R*.B*.C* 

20 PRINT "THE RESULT IS "; PRINT USING *! ' !"j A*- B*; C* 

39 END 



:<run 

enter three strings ">xvz, fgh. rbc 

the result is .x f a 



ENTER THREE STRINGS W, COMPUTER, PROGRAM 
THE RESULT IS ft C P 



3.5 INPUT item list 

This statement causes the computer to suspend execution of a program and wait until 
the user has input the specified number and type of values through the keyboard. 
Input values can be string or numeric according to the variable type The items (if 
more than one! in the list must be separated by commas. 

Example 

10 INPUT ft*, B*,R, B 



This statement permits the user to input two string values, followed by two numeric 
values. The input sequence must be consistent. When the computer executes this 
statement, it sends a signal onfo the display : 



And waits for the inputs. The user may enter all four values at once (separated by 
commas). In this case, t he inputs co uld be as follow 
orange, apple. 59.47 1NEW LINE1 



The computer then assigns the values accordingly 

ft* = "ORflNGE" 
&$ = "APPLE" 
fl - 59 
B = 4? 



The other way to input those values would be by enlenng the items on separate 
lines. In this way. the computer will remind the user to input the next data tor the 
remaining variables by displaying: 

?? 



Until all variables are set. the computer then advances to the next statement. Input 
must be compatible to the variable type specified. In other words, the user should nol 
input a string value to a numeric variable. If such an invalid entry' occurs, the com- 
puter will send the message 

■> REDO 

? 



Indicating the input does not match with the current variable type. However, the 
computer gives the user a second chance to input the correct data starting with the 
first value expected by the INPUT statement. 

Example 



10 INPUT R$. ft 
28 PRINT ft*,R 
1& END 


REftDV 
>RUN 




? STRING, 
STRING 


10 



10 
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REflDV 

:-RUN 

? THIS IS R STRING. 13 5 

THIS IS A STRING 13 5 

READY 
>RUN 

? flBCO. UK 
? REDO 
? RBCDE 
?? 25 

HBCOE 25 



If an input string consists of blanks, the entire string must be enclosed by quotes. 

In order to provide a clearer indication to the operator, the user may include a 
"prompting message" in the INPUT statement. This helps to input correct data type 
to each variable. The prompting message must immediately follow INPUT, enclosed 
in quotes, and followed by a semi-colon. 



Example 

100 INPUT "INPUT ITEH NAME RNO QUflNTITY '\ N*, Q 



READY 
>RUN 

INPUT ITEM NAME AND QUANTITY ? 



38 



3 6 DATA item list 

This statement allows the user to store data inside the program and to access them 
through READ statements. The item list will be accessed by the computer sequent- 
ially starting with the first item in the first DATA statement, and ending with the last 
item in the last DATA statement. Each item in the item list may be a string or a 
simple numeric value. Just like entering data from the keyboard, any string value 
consists of blanks, colons, commas, must be enclosed in a pair of quotes. 
The order of values in a DATA statement must match up with the variable types in 
the READ statements. DATA statements may appear anywhere in a program 

Example 

16 READ A$, B». CD 

20 PRINT R«, B*. CD 

30 DATA "CHARACTERS", "A LONG SENTENCE" 

40 DATA 20,137 54 

50 END 



READY 
>RUN 

CHARACTERS A LONG SENTENCE 20 137 54 



3.7 READ item list 

This statement instructs the computer to read in a value from a DATA statement and 
assign that value to the specified variable. The values in the DATA statement will be 
read sequentially by the READ statement. After all the items in the first DATA 
statement have been read, the next READ statement encountered will access the 
second DATA statement for the next variable. If there is no more value in the DATA 
statement available for a READ statement an Out-ot-Data error will occur. 
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Consider the following example: 

18 READ C* 

20 IF C* = "EOF" GOTO 60 

33 READ Q 

40 PRINT C*. Q 

50 GOTO 10 

60 PRINT PRINT "ENO OF LIST " END 

78 DATA BOOKS, 4, PENCILS, 12 

80 DATA BALL PENS. 5, COMPASSES, 2 

90 DATA GLASSES, 5, EOF 



3.8 



READV 

>RUN 




BOOKS 


4 


PENCILS 
BALL PENS 
COMPASSES 
GLRSSES 


12 
5 
2 
5 


END OF LIST 




RESTORE 





This statement allows the next READ statement to access the first item in the first 
DATA statement, and the subsequent items. 

Example 

10 READ A», A 

20 PRINT A*, A 

30 RESTORE 

40 READ B$. B 

50 PRINT A*, A, B*. B 

66 DATA "JOHN WHITE". 25- "JOE HUDSON". 32, "BILL ADAMS ", 30 

79 END 
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RE8DV 




WUN 




JOHN WHITE 


25 


JOHN WHITE 


25 



JOHN WHITE 25 



This program shows (hat the RESTORE: statement not only allows the READ state- 
ment to access the first item in the first DATA statement, but also it has no effect on 
the previous assignments. 



3.9 PRINT" - cassette number, item list 

This statement prints the values of the specified variables onto cassette tape. The 
recorder must be properly set tn record mode before executing this statement. For 
more detail, please consult the User's Manual. As the System 80 tan control up to 
two cassette drives, the user should specify which drive is intended. 

Example 

10 fiS = "BEGIN TftPE" 

20 B = 3. 1416 

i0 C = 50 

40 OS = "DflTfT 

56 Pfi'INT i-i, R«, B> C. D*. "END OF FILE" 

£0 END 

This program assigns various data to variables AS. B. C. and D$ respectively, then 
PRINT these data on tape through cassette drive No 1 Note that the string constant 
"END OF FILE", can be printed on tape as well as variables. Once the data are stored 
on tape, the user may input these data into the computer again, just like playing 
music tapes with a cassette Please note that the INPUT statement must be identical 
to the PRINT statement in terms of number and types of variables. However, the 
variable names may be different in any case. 

Important: 

The total number of characters respresented in all the variables mentioned in the "item 
hst" must not exceed 2S5, otherwise anything after the 255th character with be 
truncated or lost. 
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Example 

18 PRINT l-i, R*. B*, C*, D», E* 



If the tola! number of characters in AS. BS. C$, DS, are 250 and E$ has a length of 
35 characters, then E$ will not be saved on tape. And if the user tries to INPUT the 
value of E, an Out-of-Data error will occur. 



.1.10 INPUT # - cassette number, item list 

This statement tells the computer to input the specified number of values stored on 
the cassette tape and to assign them to the variables. The user must specify the cassette 
drive number from which data is expected. 

Example 

18 INPUT •-!, fl». B, L. 0$ 



This statement inputs data from cassette drive number I The first value is assigned to 
AS, the second value to B, etc. The cassette deck must be in PLAY mode. Once the 
computer executes this statement, the cassette drive will be turned on. and when the 
input has finished, the cassette drive will be turned off before the computer goes to 
the next statement. 

If a string is encounted when a numeric value is expected by the INPUT statement, a 
bad file data error will occur. An Out-of-Data error will also occur if there is not 
enough data items on the tape for all the variables in an INPUT statement. 
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PROGRAM STATEMENTS 



3.1 I DEFINT letter range 

Variable names that begin with letters specified within the letter range, will be treated 
and stored as integers. However, a type declaration character (refer to the Introduc- 
tion) can over-ride this type definition. Defining a variable name as an integer not 
only saves memory space, but also saves computer time, because integer calculation is 
faster than single or double precision calculation Note that integers can only take on 
values between - 32768 + 32767 inclusive. 

Example 

10 DEFINT X,V,Z 



After the computer has executed line 10. all variables beginning with the letters X, Y, 
or Z will be treated as integers Therefore, X2. X3. YA. YB. Zl. ZJ will become 
integer variables Except that XI tf . X2 # , YB *£. will be still double precision 
variables, because type declaration characters always override DEF statements. 

Example 

10 DEFINT ft - D 

Causes variables beginning with letter A. B. C, or D to be integer variables. 
Note that DEFINT can be placed anywhere in a program, but it may change the 
meaning of variable references without type declaration characters. Therefore, it is 
normally placed at the beginning of a program 
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3.12 DEFSNG lelter range 

Variable names that begin with those letters specified within the letter range, will be 
treated and stored as single precision variables. However, a type declaration character 
can over-nde this type definition. 

Single precision variables and constants are stored with 7 digits of precision and 
printed out with 6 digits of precision. All numeric variables are assumed to be 
single precision unless otherwise specified. The DEFSNG statement is primarily used 
to re-define variables which have previously been defined as double precision or 
integer. 

Example 

10 DEFSNG ft-D. Y 



Causes variables beginning with the letter A through D, or V to become single preci- 
sion. However, A # would still be a double precision variable and Y% still be an integer 
variable. 



3.13 DEFDBL letter range 

Variable names that begin with those letters specified within the letter range, will be 
treated and stored as double precision However, a type declaration character can 
over-nde this type definition. Double precision allows 17 digits of precision, while 
only 1 6 digits are displayed when a double precision variable is printed. 

Example 

18 DEFDBL M-P, Q 

Causes variables beginning with one of the letters M through P. or G to become 
double precision. 
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3.14 DEFSTR leller range 

Variables thai begin with those letters specified within the letter range, will be treated 

and stored as string. 

However, a type declaration character can over-ride this type definition. Each string 

can store up to 255 characters, if there is enough string storage space cleared. 

Example 

18 DEFSTR fl-D 

Causes variables beginning with any letter A through D to be string variables, unless a 
type declaration character is added Therefore, after the execution of line 10. the 
assignmeni B3 = "A STRING" is valid 



3.15 CLEAR n 

This statement sets all variables to zero. If number n is specified, the computer sets n 
bytes of space for string storage. Everytimc when the System 80 is turned on, 50 
bytes of space are automatically cleared and reserved lor strings. 

The CLEAR statement becomes critical during program execution, because an Oul of 
String Space error will occur, if the amount of string storage cleared is less than the 
grealest number of characters stored in string variables. 

Example 

10 CLEAR 1096 

Clear 1000 bytes of memory space for string storage. 

3.16 DIM name (dim I. dim 2 dim nl 

The statement defines the variable name to be an array or list of arrays The number 
of elements in each dimension may be specified through dim 1. dim 2. etc. II dim n 
is not specified. 1 1 elements in each dimension is assumed in each array. The number 
of dimensions is limited only by the memory sue available. 
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Example 

10 DIM ft<5>. 8(3,4;. C<2,3,3> 

This statement defines the one dimensional array with 6 elements (from to 5); the 

two dimensional array B with 20 elements (4 x 5); the three dimensional array C with 

48 elements (3 x 4 x4). 

DIM statements may be placed anywhere in a program, and the number of subscripts 
may be an integer or an expression. 



Example 



10 INPUT "NUMBER UF TIMES (, .N 
20 DIh fl(N+2. 4) 



The number of elements in array A may vary according to N. 

To re-dimension an array, the user must use a CLEAR statement either with or 

without the argument n. Otherwise an error will occur. 

Example 



10 X(2> ■ 13. 6 

20 PRINT "THE SECOND ELEMENT IS . ";X<2> 

38 DIM X(15) 

40 PRINT X(2) 

50 END 



READY 
>RUN 

? DD ERROR IN 38 
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3.1 7 LET variable = expression 

This statement is used to assign a value to a variable. The word LET is not required 
in assignment statements by the System 80 BASIC interpreter. However, the user 
may use the word LET in order to make the program compatible with other systems. 



Example 



10 LET fl ■ 3. 67 
20 BJC = 28 
30 S* = "CHARACTERS" 
40 LET DK ■ t>y. + 1 
58 PRINT FbB&StiDX 
60 END 



REflOV 
>RUN 



5 67 20 CHARACTERS 



in all the assignments above, the variable on the left of the equal sign is assigned with 
the value of the constant or expression on the right side All these statements are 
acceptable. 



3.18 END 



This statement causes a normal termination of program execution. The END state- 
ment is primarily used lo cause execution to terminate at some point other than the 
logical end of the program. 

Example 



3 


B = 3 


C - 


14 




10 


A « C 


♦ B 






20 


oosue 


70 






30 


* X 


+ V 






40 


PRINT 


"THE 


RESULTS 


ARE 


50 


PRINT 


A, D 






60 


END 
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70 X » 50 
80 Y = ft » X 

90 RETURN 

THE RESULTS ARE 17 986 



The END statement in line 60 prevents the computer from executing into line 70. 
Therefore the subroutine that starts at line 70 can be accessed only by line 20. 



319 STOP 

This statement is essentially a debugging aid. it sets a break point in a program dunng 
execution, and allows the user to examine or modify variable values A message will 
be printed out as "BREAK IN line number" once the computer executes the STOP 
statement. The Active Command CONT can then be used to re-start execution at the 
point where it breaks. 

Example 



5 INPUT B, C 






10 A = B + C 


i 




20 STOP 






30 X - (ft + 


ova 


74 


40 IF X < 


GOTO 


70 


50 PRINT fl.B 


i,C 




60 PRINT X 






70 END 






READY 






>RUN 






72.4 






BREAK IN 2& 






READY 






>PRINT A 

p 






o 

READY 






>C0NT 






6 




2 


8. 10811 







The STOP statement allows the user to examine the value ot A before line 30. 
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3.20 GOTO line number 

This statement transfers program control to the specified line number. If used in- 
dependently, an unconditional branch will result. However, test statements may 
precede the GOTO statement to create a conditional branch. 



Example 



16 A = 18 

28 B - 45 

38 C = A + B 

48 C = C ♦ 2. 4 

58 GOTO iee 
60 

70 



108 PRINT "fl = ";A, m B* m .B, "C«";C 

118 ENO 

READY 

>ROH 

A » 10 B= 45 O 187 

When line 50 is executed, control will unconditionally jump to line 100. 
Example 

10 IF A = 2 GOTO 128 



When line 1 is under execution, if A equals to 2 then control will jump to line 1 20. 
otherwise it will just go to the next statement. 

The user may use GOTO in the Active Command level as an alternative to RUN 
command. GOTO line number causes execution to begin at the specified line number, 
but without the automatic CLEAR. 
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3.21 GOSUB line number 

Transfers program control to the specified line number where a subroutine starts. 
Only if the computer encounters a RETURN statement, it will then jump back to the 
statement that immediately follows the GOSUB. Just like GOTO, GOSUB may be 
preceded by a test statement, such as: 
IF A= B THEN GOSUB 100 

Example 



18 PRINT "MAIN PROGRAM » 

29 GOSUB 56 

30 PRINT "ENO OF PROGRAM 
40 ENO 

S0 PRINT -SUBROUTINE " 
68 RETURN 

READY 
•RUN 

MAIN PROGRAM 
SUBROUTINE 
END Of PROGRAM 



3.22 RETURN 



This statement ends a subroutine and returns control to the statement that immedi- 
ately follows the GOSUB An error will occur if RETURN is encountered without 

execution of a matching GOSUB. 



3.23 ON n GOTO line number list 

This statement allows multi branching to the line numbers specified according to the 
value of n The general format lor ON n GOTO is: 

ON expression GOTO I si line number. 2nd line number mth line number 

The value of the expression must be between and 255 inclusive. 
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When ON-GOTO statement is executed, first, the expression is evaluated and the 
integer portion, that is INT (expression) is obtained. Then the computer assigns this 
integer to N, and counts over to the Mth element in the line number list, and then 
branches to the line number specified by that element If N is greater than the avail- 
able line number M, the control fall through to the next statement in the program. 
If the expression or number is less than zero, an error will occur. 
The line number list may contain any number of items. 

Example 

10 INPUT "ENTER COMMAND ">C 

20 ON C GOTO 106- 120- 136- 158, 138 

30 PRINT "END OF PROGRAM " END 

100 PRINT "THIS IS LINE 100" GOTO 10 

120 PRINT "THIS IS LINE 120" GOTO 18 

138 PRINT "THIS IS LINE 130" GOTO 10 

158 PRINT "THIS IS LINE 150" GOTO 10 

REflOV 

>RUN 

ENTER COMMAND ? 5 

THIS IS LINE 130 

ENTER COMMAND ? 4 

THIS IS LINE 150 

ENTER COMMAND ? 1 

THIS IS LINE 100 

ENTER COMMflND ? 2 

THIS IS LINE 120 

ENTER COMMAND *> 3 

THIS IS LINE 130 

ENTER COMMAND ? 

END OF PROGRAM 

READV 

•RUN 

ENTER COMMAND * 4 

THIS IS LINE 150 

ENTER COMMAND "> 6 

END OF PROGRAM 
The ON-GOTO statement is a more elegan! way of achieving the some result 
than the equivalent IF-GOTO statements; 

10 IF C - 1 GOTO 180 

20 IF C = 2 GOTO 128 

30 IF C = 3 GOTO 130 

48 IF C = 4 GOTO 150 

50 IF C = 5 GOTO 1S0 

60 IF C < 1 OR C > 5 GOTO 70 REM GO TO THE NEXT STATEMENT 
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3.24 ON n GOSUB line number list 

Works like ON n GOTO, except control branches lo one of the subroutines specified 
by the line numbers in the line number list. 

Example 



3.2S 



10 PRINT " ** FUNCTION SUBROUTINES ** 


28 PRINT " 1 FUNCTION ft" 




56 PRINT " ^ FUNCTION B u 




40 PRINT " 3. FUNCTION C" 




50 INPUT "ENTER 1, Z, OR 3 \N 




60 ON N GOSUB 150, 100. 250 




78 END 




100 PRINT "THIS IS FUNCTION B" 


RETURN 


150 PRINT "THIS IS FUNCTION A" 


RETURN 


250 PRINT "THIS IS FUNCTION C" 


RETURN 


REfiOV 




>RUN 




** FUNCTION SUBROUTINES ** 




1 FUNCTION ft 




2 FUNCTION B 




3 FUNCTION C 




ENTER 1, 2, OR 3 *> 2 




THIS IS FUNCTION B 




*ERDY 




>RUN 




** FUNCTION SUBROUTINES ** 




1 FUNCTION fl 




2. FUNCTION B 




3 FUNCTION C 




ENTER 1, 2, OR 3 ? i 




THIS IS FUNCTION fl 




FOR name = expression TO expression STEP 


expression 


NEXT name 





These statements form an iterative loop so that a sequence of program statements 
may be executed over a specified number of times. 
The general form is: 

FOR counter ■ initial value TO final value STEP increment. 

• 

» 
Statements 



* 

NEXT counter 



In the FOR statement, initial value. final value and increment can be constants, vari- 
ables or expressions The first time the FOR statement is executed, these three arc 
evaluated and the values are saved, if these values are changed inside the loop, they 
will have no effect on the loop's operation. However, the counter value must not be 
changed or the loop will not operate normally. 

The FOR-NEXT loop works as follows, the first time the FOR statement is executed, 
the counter is set to the "initial value". Execution proceeds until a NEXT statement 
is encountered At this point, the counter is incremented by the amount specified in 
the STEP increment If STEP increment is not used, an increment of I is assumed 
However, if the increment has a negative value, then the counter is actually 
decremented 

The counter is then compared with the final value specified in the FOR statement. If 
the counter is greater than the final value, the loop is completed and execution 
continues with the statement following the next statement ) if increment was a negative 
number, loop ends when counter is less than the final value.) 

If the counter has not yet exceeded the final value, control passes back to the first 
statement after the FOR statement. 



Example 



10 FOR K = 6 TO 1 STEP 2 

20 PRINT "THE VALUE OF K "*K 

30 NEXT K 

40 END 

READY 

>RUN 

THE VALUE OF K 

THE VALUE OF K . . 3 

THE VALUE OF K .6 

THE VALUE OF K 9 



When K = 1.2, it is greater than the final value I, therefore the loop ends without 
ever printing 1.2 



Example 



10 FOR N = 5 TO 

20 PRINT "THE VRLUE OF N ", N 

38 NEXT N 

40 END 



REROV 
>RUN 




THE VflLUE OF N 


5 


10 FOR N = 5 TO g STEP -1 
20 PRINT "THE VflLUE OF N 
30 NEXT N 
40 END 


REfiDV 
>RUN 




THE VflLUE OF N 
THE VflLUE OF N 
THE VflLUE OF N 
THE VflLUE OF N 
THE VflLUE OF N 
THE VRLUE OF N 


5 

4 

3 

2 

i 




N 



Since no STEP was specified, so STEP 1 is assumed. N is incremented the first time, 
and its value becomes 6. Because 6 is greater than the final value 0. the loop ends. 
This is remedied by adding STEP- 1 , as you can see. 
Example 



%fl 



10 FOR A > 


= 


TO 


3 


20 PRINT 


'THE VflLUE 


30 NEXT 








40 END 








REFIDV 








>RUN 








THE VALUE OF 


ft 


e 


THE VflLUE 


OF 


A 


i 


THE VALUE 


OF 


A 


2 


THE VALUE 


OF 


A 


3 



Note here that instead of using NEXT A in line 30, you may simply write NEXT. 
However, this can lead to trouble if you have nested FOR-NEXT. loops. 
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Here is an example of nested loops, showing how it is advisable to identify the 
counter variable in each NEXT statement: 

16 I - i 

20 J * 2 

38 K = 3 

40 FOR N = I • i TO J + 1 

50 PRINT "FIRST LOOP" 

FOR M * I TO K 



70 PRINT " SECOND LOOP" 

80 NEXT M 
90 NEXT N 
108 END 
READV 
•RUN 

FIRST LOOP 
SECOND LOOP 

SECOND LOOP 
SECOND LOOP 

FIRST LOOP 
SECOND LOOP 

SECOND LOOP 
SECOND LOOP 

3.26 ERROR Code 

This statement is used for testing an ON ERROR GOTO routine. When the ERROR 
code statement is encountered, the computer will proceed exactly as if that kind of 
error has occurred. 

Example 

30 ERROR 1 

ft* ERROR IN 30 
For the definition of each error code, please refer to Appendix B. 
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3-27 ON ERROR GOTO line number 

This statement allows the user to set up an error-trapping routine to recover a pro- 
gram from an error and to continue, without any break in execution Without this 
statement, the computer will stop execution and pnnt out an error message, once it 
encounters any kind of error in the user's program. Normally, the user has a particular 
type of error in mind when an ON ERROR GOTO statement is used 
For example, suppose that a program performs some division operations and the user 
has not ruled out the possibility of division by zero. The user could write a routine to 
handle a division-by-zero error, and then use ON ERROR GOTO to branch lo that 
routine when such an error occurs. 



Example 



5 B = 15 C = e 

10 ON ERROR GOTO 128 

20 R » B/C 

30 PRINT A.B-C 

40 END 

120 PRINT "DIVIDED BY ZERO 

138 END 

READY 

-Am 

DIVIDED BV ZERO !! 



In this example, C has a value of zero, so a divide-by-zero error will occur when the 
computer attempts to execute line 20. But because of line 10. the computer will 
simply ignore line 20 and branch lo the error-handling routine beginning at line 120 
Please note that the ON ERROR GOTO statement must be executed before the 
error occurs, otherwise it has no effect. Note also that the error handling routine 
must be terminated by a RESUME statement. 



3.28 RESUME line number 

This statement terminates an error handling routine by specifying where normal 

execution is to resume. 

RESUME or RESUME without a line number causes the computer to return to the 

statement in which the error occurred If RESUME is followed by a line number, it 

causes the computer to branch to the line number provided. 

RESUME NEXT causes the computer to branch to the statement following the point 

at which the error occurred 

Example 

lfci ON ERROR GOTO SO 

20 PRINT "SIMPLE DIVISION " 

33 INPUT "ENTER TWO NUMBERS ".ft,B 

48 IF A = 8 END 

56 L = A/8 

£6 PRINT "THE QUOTIENT IS \C 

re goto 20 

86 PRINT "ATTEMPT TO DIVIDE BV ZERO '" 
90 PRINT "TRV AGAIN. " 
IBB RESUME 2© 57 

REfiDY 

.-RUN 

FIMPLE DIVISION 

ENTER TWO NUMBERS "'6-2 
THE QUOTIENT IS 3 

SIMPLE DIVISION 

ENTER TWO NUMBERS ? 7 . 3 

THE QUOTIENT IS 2-33333 
SIMPLE DIVISION 

ENTER TWO NUMBERS ? 5 , 8 
ATTEMPT TO DIVIDE BV ZERO ■ 

TRV AGAIN- 
SIMPLE DIVISION 
ENTER TWO NUMBERS ? 9 . 4 
THE QUOTIENT IS 2 25 
SIMPLE DIVISION 
ENTER TWO NUMBERS : * 6 i 8 



READS' 
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3.29 REM 



REM represents remarks. This statement informs the computer that the rest of the 
line only consists of comments, and should be ignored. The statement also allows 
the user to have more comments in his program for better documentation. If REM is 
used in a multi-statement program line, it must be the last statement. 

Example 

18 REM * VARIABLE REPRESENTATIONS * 
20 REM * A = AMOUNT * 

38 REM * B = NUMBER OF ITEMS * 
48 REM * C = UNIT COST * 

58 REM • * 



68 A = B ♦ C : REM ** AMOUNT = NO OF ITEMS X UNIT COST 



3.30 IF expression action-clause 

This statement instructs the computer to test a logical or relational expression. If 
the expression is TRUE, control will proceed to the "action" clause immediately 
following the expression If the expression is False, control will jump to the matching 
ELSE statement (if there is one) or down to the next program line. 
In numerical terms, i! the expression, has a non-zero value, it is always equivalent to a 
logical true. 

Example 

18 INPUT "ENTER A VALUE (MAX 20) ";A 

28 IF A > 28 GOTO 68 

30 A = A * 3 1416 * 2 

48 PRINT "THE CIRCUMFERENCE IS ".A 

58 END 

60 PRINT "NUMBER TOO BIG | (MAX 28)" GOTO 10 



REfi&V 
•RUN 



58 



ENTER A VALUE (MAX 28) ? 24 
NUMBER TOO BIG * (MAX 28) 
ENTER A VALUE (MAX 28) ? 18 
THE CIRCUMFERENCE IS U3 098 



In this example, if A is greater than 20 then a warning is printed and another input is 
expected. However, if A is equal to or less than 20, the computer will go to the next 
line and compute the value of A. without passing through the warning message and 
the GOTO statement. 

Example 

129 INPUT R IF fl = 10 AND R > B THEN 160 

129 INPUT fi IF fl = 10 AND R > B GOTO 168 
The two statements above have the same effect. 



3.31 THEN statement or line number 

Initiates the "action clause" of an IF - THEN type statement. THEN is optional 
except when it is used to specify a branch to another line number, as in IF A > D 
THEN 100. THEN should also be used in IF - THEN ELSE statements. 



3.32 ELSE statement or line number 

This statement must be used after the IF statement, and acts as an alternative action 
in case the IF test fails. 

Example 

10 IF R - 1 THEN 60 ELSE 40 



In this example, if A ■ I then control branches to line 60, otherwise it branches to 
line 40. If the ELSE clause is not used and A is not equal to I , the computer will go 
to the next statement instead of branching to line 40. 

IF-THEN-ELSE statements may be nested, but the number of IFs and ELSEs must 
match with each other. 
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Example 

18 INPUT "ENTER THREE NUMBERS "-X, V, Z 
28 PRINT "THE LARGEST NUMBER IS ". 

58 IF X < V OR X < Z THEN IF V < 2 THEN PRINT Z ELSE PRINT V ELSE PRINT X 

48 END 

READY 

>RUN 

ENTER THREE NUMBERS ? 38 . 75 . 73 

THE LARGEST NUMBER IS 75 

This program accepts three numbers and prints out the one that has the highest value. 



3.33 LPR1NT 



Prints a file onto the printer. This command (and statement) functions similar to a 
PRINT statement (print on the display). If the line printer is not properly 
connected, the computer will enter a dead loop and will wait to print the first 
character. This situation can only be resolved by turning the printer on or hitting the 
RESET button. 



16 FOR X = 1 TO 8 STEP -8 25 

28 LPRINT "THE VALUE OF X "j X 

38 NEXT X 

48 END 

READY 

>RUN 

THE VALUE OF X 1 

THE VALUE OF X 75 

THE VALUE OF X 5 

THE VALUE OF X 25 

THE VALUE OF X 8 
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CHAPTER 4 
PROCESSING ARRAYS 



An array is simply an ordered list of data Both alphabetic and numeric arrays are acceptable 
by the System 8U However, The data type of an array must be consistent The concept 
of arrays is very important in computer programming, therefore the user should try to 
understand the examples in this Chapter. 

Suppose John Washington is studying in a college. There is a three story building which has 
four classrooms on each floor and each room has 45 seats. 

John is taking a history course. There are only 36 students in his class. Now. let us look 
through the name list of John's class. 



NAME LIST 

I. Mary Adams 
2 Jimmy Brown 
3. Henry Cox 



36 John Washington 



In oitJer to find a specific person in the list, we just read the list from top to bottom or from 
boitom to top; however, the method of searching by name is not very important here. 

The most important issue is how we can find a person in the list by referring his number 
only In the list mentioned above, the 1st person is Mary Adams, the 2nd person is Jimmy 
Brown, etc. The numbers give us a systematic way to find a person 
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If we use a computer to record this list, we may assign each name in the list to a unique 
variable, as the following 



10 N8$ ■ 


"MARY ADAMS" 


20 Ni* = 


"JIMMY BROWN" 


20 N2* = 


"HENRY COX" 


40 
50 




60 




?0 




80 




90 




108 NSS= 


"TOM HUDSON" 


110 . 




120 

130 . 




140 NZ$ i 


■ "JOHN WASHINGTON 



This is a time consuming and inefficient method; besides, what happens if there are 37 
student* in the class? 

Obviously, we need to use a variable name starling with another letter, such as MIS. etc. 
Another way. also the better way to handle this list is by using an array. We first define an 
array ARS of 45 elements (for there arc 45 seats!, then assign those names to each element. 



Example 



5 CLEAR 1880 REM CLEAR 1888 BVTES FOR STRING STORAGE 

10 DIM AR»<44) REM ARRAV AR* HAS 45 ELEMENTS. 

20 FOR N " 8 TO 44 REM LOOPS 45 TIMES 

30 INPUT "ENTER THE NAME OF THE STUDENT "; AR*<N) 

40 REM ASSIGN THE NAMES TO EACH ELEMENT IN THE ARRAY 

58 NEXT N 

60 END 
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This program accepts 45 names and stores them in the array AR$. After executing the 
program, the following should be true. 

Element ARS (0) has the value of "Mary Adams" 

Element ARS (Unas the value of •'Jimmy Brown" 

Element ARS (2) has the value of "Henry Cox" 



Element ARS (36) has the value of "John Washington" 

Provided the inputs are correct, of course! 

Now. if we want to print out the entire list, we may use this program 

5 clew ieee . rem clear ieee bytes for string storage 

18 DIM AR*<44> REM ARRAY AR* HAS 45 ELEMENTS 

15 REM ** INPUT RRRAY SECTION ** 

20 FOR N = TO 44 . REM LOOPS 45 TIMES 

30 INPUT "ENTER THE NAME OF THE STUDENT ". AR*<N> 

40 REM ASSIGN THE NAMES TO EACH ELEMENT IN THE ARRAY 

50 NEXT N 

55 REM ** PRINT ARRAY SECTION *» 

60 FOR N = TO 44 REM LOOPS 45 TIMES. 

70 PRINT AR*<N) ; REM PRINTS THE N TH ELEMENT OF THE ARRAY 

80 NEXT N 

90 END 



Instead of the following statements. 

18 PRINT N8$ 
20 PRINT Ni» 
30 PRINT N2* 
40 



80 PRINT NSi 
98 



110 PRINT NZ* 
120 

130 

By now. the user should have some feeling of how powerful arrays could be. 
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Suppose the teacher in John's class wants to set up a seat plan by rows and colunis. Since 
there are 6 columns, then only 6 rows of seals are needed. 



HOW 3 































HENRY 
COX 






JIMMY 
BROWN 












JOHN 
WASHINGTON 








MARY 
ADAMS 











1 s 

COLUMN 



The lour students we always mentioned are seated as in the plan above. Since they are 

not sealed according to the name list, we need another method to access the seat plan. For 
example, if the professor tries to sec if John Washington is absent or not. he has to look 
through the room and find out whether the seat at row 1, column 3 is empty or not. The 
professor has to search for row 2 column lor Henry Cox as well. Actually, the computer just 
works the same as the teacher does. We may map this scat plan into a two dimensional array 
named SPS (5. 5), the first 5 is lor row, and the second 5 is for column. In case we want to 
call Jimm> Brown, we must reference SPS i2. 3), that is row 2 column 3. 
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Now suppose wc want to pnnl the seal plan in a table form, we may use the program below; 

10 CLEM? 1000 DIM SP$C5, 5> ; REM SP» IS fl 6 X b ARRAY 

20 FOR R = 5 TO STEP -1 

30 REM SET fl LOOP TO PRINT FROM ROW 5 TO ROW 0. 

40 FOR C ■ TO 5 

50 REM SET fl LOOP TO PRINT THE NAMES IN EACH COLUMN 

60 PRINT SP*CR.C>, REM PRINT THE NAME RT ROW 'R' COLUMN 'C 

70 NEXT C 

88 PRINT REM CARRIAGE RETURN 

90 NEXT R 

100 END 

This program prints a seat plan in a table form. It starts with the last row in the eias*, and 
ends with the first row The program first initializes. R = S, C - then prints the value ot 

the elements. 



SP*C5. 0J.SP*<5, 1)-SP*C5,2),SP$<5. 3)> SP»C5. 4). SP*<5, 5> 

At this point, the value of C becomes 5. the computer jumps out of the loop "C" and prints 
a blank line as on line 80 and slips to the next line. The computer passes line 70 and loops 
back to line 20 and then R - 4; the computer resets C = on line 40 and prints the value of. 

SP$<4, &), SP*C4, i>, SP$<4. 2), SP*><4, 3); SP«C4, 4); SP«<4, 5> 

The process repeated until R = 1 , and the program stops. The final output will have values 
of the elements in the following order. 

SPSC5. 0>, SP*<3, i>f SP*<5. 2h SP*<5, 3>, SPS<5, jftflNtift 5> 
SP$C4, 0>, SPt<4, l>ij SP»<4, 2). SP«4, 3)3 SP«C4, 4>. SP*<4, 5) 
SP«C2» B>* SP«C3, 1). SP$<3, 2). SP»<3, 3)* SPSC3, 4)> SP*<3, 5) 
SP$C2, 0>- SP*(2> 1); SP«C2, 2>; SP*(2- 3)> SP»<2, 4). SP*<2. 5) 
SP*<1. 0>J SP$<1. 1>. SPfCl, 2); SP*(i, 3>, SP*<1- 4)- SP»<1. 5) 
SP*CB, 0). SPf <0, 1); SP$C0. 2>i SP*<0* 3>> SP«<0, 4). SPSC0. 5) 
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By using this two dimensional array, we can locate the exact position of any student in a 
class But how can we locate another student who stts at the identical position as John 
Washnighton. but in the next class? Of course, we need to mention which class or which 
room number that the student is in In this case, we need another dimension to describe a 
specific student's location. Remember, there arc a total of twelve class rooms in the 
building. We have different ways to solve this problem The first method is to assign a 
number ranged from I lo 12 to each room. Or wc may distinguish them by floor number. 

That is room 1 on the 1st floor, room 2 on the 1st floor room 1 on the 3rd floor, 

etc. The first method requires only one additional dimension, whereas the second 

method requires two additional dimensions. 

Say John's classroom is the 3rd room on the second floor. By using the first method, we 
may locate John by referring SPS (N. R. C) where N represents thenumbero! thcroom. R 
represents row number and C represents column number. To be more specific. John sits at 
SPS (7. 1. 3) that is room number 7, row number 1. column number 3 However, by using 
the second method, we need to mention SPS (F, N. R, Cl where F represents floor number, 
N represents the room number. R represents row number, C represents column number. To 
locate John, we need to refer to SPS (2, 3, I. 3). that is the 2nd floor, room number 3, row 
number 1 , column number 3. 

The number of dimensions may increase if we try to accept and classify more students into 
this set. If we try to identify some other students in another building, we need another 
dimension to define which building. If we consider other colleges, yet we need another 
dimension lo describe which college. 

In every System 80, the number of dimensions in an array is only limited by ihe memory 
space available in the computer. 
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CHAPTER 5 
STRING HANDLING 



Siring operations are I he essence in data processing 

It is obvious that if a computer cannot handle string operations, it is only a super powerful 
calculator Based on this tact, the System 80 allows many useful siring operations in 
addition lo arithmetic operations. 

In this chapter, we will discuss various siring (unctions that are acceptable in our Extended 
Basic language 



S.I Siring Comparison 

Bv using ;i relational operator, two strings may be compared for equality or alphabetic 
precedence. If they are checked for equality, every character, including any leading or 
trailing blanks, must be identical otherwise the test fails. 



l-.xample 



18* IF fl» = "YES" THEN ^'59 



Strings are compared character by character from left to right. Actually, the ASCII 
code representations for the characters are compared. A character with the lower 
code number is considered to precede the other character. In other words. "AB" 
precedes "AC" When strings ot different lengths are compared, the shorter string is 
precedent even if Us characters are identical as those in the longer string. Therefore. 
"B" precedes "B ". The following relational operators may be used to compare 
strings 



=>,>,= 



. O 



67 



5.2 String Operation 

Basically, there is only one stnng operation, that is concatenation which is represent- 
ed by the plus sign "+". 

Example 

18 SI* = "THE SUN IS" 
28 52* = ■ SHINING" 

36 S3* «= V 

48 C* = SI* + 52* + 53* ♦ S2* + S3* + S2* + " " 

58 PRINT C* 
68 END 

READ'.' 

>RUN 

THE SUN IS SHINING, SHINING/ SHINING 



5.3 ASC (string) 

This statement returns the ASCII code (in decimal) for the first character of the 
specified string. The string specified must be enclosed in parentheses. A null-string 
will cause an error to occur. 

188 PRINT "THE HSCII CODE FOR H' IS", ftSCfH^ 

105 S* = "HOME" PRINT "THE STRING IS ";S* 

118 PRINT "THE ASCII CODE FOR THE FIRST LETTER IS %RSC<S*> 

1^8 END 

REftOV 

>RUN 

THE ASCII CODE FOR 'H IS 72 

THE STRING IS HOME 

THE ASCII CODE FOR THE FIRST LETTER IS 72 



Both lines will print the same number. 

A complete set ol control, graphics, and ASCII codes is listed in appendix C. 
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5.4 CHRS (expression) 

This statement works as the inverse of the ASC function, that is to return the 
character of the specified ASCII, control or graphics code. The argument may be any 
number from to 255. or any variable expression with a value within that range. The 
argument must be enclosed in parentheses. 

106 PRINT CHR«<33> . REM PRINT A " SIGN 

5.5 LEFTS (string. n( 

This statement returns the first n characters of the specified string. The arguments 
must be enclosed in parentheses String may be a constant or an expression, and n 
may be a numeric expression. 



Example 



lfe) AS = "RBCOEFG" 
20 BS = LEFTS<.AS,4> 

39 PRINT BS 

40 END 
RtADY 
>Rl« 

abcd 



5.6 RIGHTS (string, n) 

Returns the last n characters of a string Both string and n must be enclosed in paren- 
theses String may be a string constant or variable, and n may be a numerical constant 
or variable. If the length of the siring is less than or equal to n, the entire string is 



returned. 
Example 



10 AS = "ABCOEFG" 
28 BS = RIGHTStAS. 3> 

30 PRINT &$ 
40 END 
READY 
>RUN 

EFG 
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5.7 LEN (siring) 

Relums the length value of the specified string. The string may be a variable, 
expression or constant and must be enclosed in parentheses. 

Example 

18 ft* = "fteCMFG" 

20 PRINT "LENGTH OF THE STRING. "; LEN<ft*J 

38 END 

REftDV 

>RUN 

LENGTH OF THE STRING ? 



5.8 MIDS (siring, p. n) 

Returns a substring of string starting at position p. with length n. The string, position 
and length must be enclosed in parentheses. String may be a constant or an expres- 
sion, p and n may be numeric expressions or constants. 

Example 

10 ft* = "RBCDEFG" 

28 B* = MID*<fl*. 3,4) 

30 PRINT "THE NEW STRING IS ! *j 6* 

46 END 

REftDV 
>RUN 

THE NEW STRING IS 



5.9 STRS (expression) 

Converts a constant or numeric expression into a string of characters. The expression 
or constant must be enclosed in parentheses. 



Example 



10 A B 34 56 
20 8* = STR$<fl> 

39 B* = B» + '"/." 

48 PRINT "THE RESULT IS *J B« 

58 END 

REftDv 
>RUN 

THE RESULT IS 34 562 



5.10 STRINGS (n. character or number) 

Returns a string which composed of n number of the specified character. 



Example 



10 PRINT STRING*(18. "*"> 
20 END 

mm 

>RUN 



Character may be a number from 0-255; in this case, it will be treated as an ASCII, 
control or graphics code. 

10 PRINT STRING* (10, 33) 
20 END 



REflD'i 
,-RUN 
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5.11 VAL (string) 

Performs the inverse of the SIRS function; that is to return the numeric value of the 
characters in a string argument. 

Example 



16 fl$ » "56" 

28 B$ « "22" 

36 C = VAL <ft$ ♦ ". ■ ♦ B$> 

46 PRINT "THE RESULTS ARE ";C; ", "j C*i06 

5e END 



REflDV 

>RUN 

THE RESULTS ARE 56. 23 , 156. 23 
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CHAPTER 6 

BUILT-IN 

ARITHMETIC FUNCTIONS 



In this chapter, we will discuss the built-in functions available in the System 80 In most 
cases, it is necessary to pass an argument (initial value) to the function, before a desired 
value (result) would be returned The argument may be a constant, a numeric variable, or 
an expression. The general format could be 



result = function (argument) 



Example 



10 A = RND 


<3> 




26 B = INT 


<C> 


/ D 


30 E = SGR 


<F i 


1 Q - 



4> 



functions discussed in this chapter 



1 


flBS(X) 


2 


flTNCX; 


3. 


CDBL<X> 


4 


CINTCX) 


5 


cas<x> 


6 


CSNG<X> 


7 


EXP<X> 


8. 


FIX<X> 


9. 


INTCX) 


10 


L0G<X) 


11 


RANDOM 


12. 


RNDCX) 


13 


SGN<X) 


14 


SIN<X> 


15. 


50RCX) 


16. 


TAN<X) 
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6.1 ABS(X) 

Returns the absolute value of the argument X. 

6.2 ATN(X) 

Returns the arctangent function (in radians) of the argument. To get the arctangent 
in degrees, multiply ATN (X) by 57.29578. 

6.3 CDBL(X) 

Returns a double-precision representation of the argument The value returned 
contains 17 digits, however, only the digits contained in the argument will be 
significant. 

6.4 CINT(X) 

Returns the largest integer that is not greater than the argument. The argument must 

be within the range of - 32768 to + 32768. 

For example. CINT (2.6) returns 2; CINT (-2.6) returns -3. 

6.5 COS(X> 

Returns the cosine function of the argument (in radians) In order to obtain the 
cosine of X when X is in degrees, use COS ( X* .01 74533) 

6.6 CSNG(X) 

Returns a single -precision representation of the argument It returns a 6 significant 
digit number with 4/5 rounding for a double precision argument 

6.7 EXP(X) 

Returns the "natural exponential" of X. that is e* . 
This is the inverse of the LOG function. 

6.8 FIX (X) 

Returns a truncated representation of the argument with all digits on the right of the 
decimal point being truncated or chopped off. For example. FIX (1.5) returns I. FIX 
(-1.5) returns -I. 
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6.9 INTiXl 

Returns an integer representation of the argument, using the largest integer that is 
not greater than the argument. The argument is not limited to the range -32768 to 

+32768. For example , INT (3.5) returns 3. INT (-3.5) returns -4 

6.10 LOG(X) 

Returns the natural logarithm of the argument, that is log (X). To find the logarithm 
of a number of another base b. use the formula log^lXl = log^fXj/log^ (b). 

6.11 RANDOM 

This function causes the computer to generate a new set of random numbers even- 
time when the computer is turned on and runs a program which has RND functions. 
No argument is needed m this function. 

6.12 RND(X) 

Returns a pseudo-random using the current pseudo-random number (generated 

internally and has not access to the user). 

RND (0) returns a single-precision value between and I . 

RND (X) re I urns an integer between 1 and X inclusive. 

However, X must be positive and less than 32768. 

6.13 SGN(X) 

The "sign" function, that is to return -I if X is negative. is X is zero, and + I if X is 
positive. 

6.14 SINtXl 

Returns the sine function of the argument (in radians). 

To obtain the sine of X when X is in degrees use SIN (X* .0174533) 

6.15 SQRlXl 

Returns the square root of the argument 

6.16 TAN (XI 

Returns the tangent function of the argument (in radians). 

To obtain the tangent of X and X is in degree, use TAN t X' .01 74533). 
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CHAPTER 7 
GRAPHICS FEATURES 



There are only four graphics functions available in the System 80 However, they ure 
powerful enough to allow the user to create any graphic patterns on the display with or 
without the help of our Extended BASIC language 

For the display map. please refer to appendix E 

7.1 SET(x.y) 

This function turns on the graphics block on the display at the location specified by 
the coordinates x and y The display is divided up into a 128 (horizontal) by 48 

(vertical) grid The x coordinates arc ranged from to 12?. organized from left to 
right. The y coordinates are ranged from to 47. organized from top to bottom 
Therefore, point 10. 0) is located at the extreme top left corner of the display; 
whereas point ( 1 27. 47) is located at the extreme bottom right corner ol the display. 
Hie arguments x and y may be numeric constants, variables or expressions. Since the 
SET Ix. y) function uses only the integer portion of x and y, neither argument need 
be an integer 

7.2 RESEilx.yl 

This function turns off a graphics block on the display at the location specified by the 
coordinates x and y This function has the same limits and parameters as SET l x. y ). 

7.3 CLS 

This function clears the entire display by turning off all the graphics blocks. It also 
moves the cursor to the upper left corner. This function allows the user to present an 
outstanding display on the screen, without any symbol previously displayed. 

7.4 POINT {x. y) 

This function examines the specified graphics block to see whether it is ON or OFF 
If the block is ON (has been SET), then POINT returns a binary True (-1). If the 
block isOFF. POINT returns a binary False iOi 

Example 

A = POINT O, 40) 

If point (3, 40) has been set, then A has the value of -I . Otherwise A has the value of 
0. 
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CHAPTER 8 
SPECIAL FEATURES 



8.1 INP (port-numberl 

Input a 8-bit value from the specified port. The System 80 is capable of handling 
256 ports, numbered from to 255. Usually this function is used only when the 
expansion box is installed. 

Example 

18 R = INP <124) 

This will input an 8-bit value from port 1 24 and assign it to variable A. 



8.2 OUT port-number, value 

Output an 8-bit value to the specified port. This statement requires two arguments: 
port-number and the value. The System 80 is capable of handling 256 ports, 

numbered from to 255. 

Example 

29 OUT 14- 240 

Output the value 240 to port 14. Both arguments are limited to angle byte values, 
that is 0-255. 

8.3 PEEK (address) 

This function returns the 8-bit value stored at the specified decimal address in the 
computer's memory, and displays the value in decimal form The value will be 

between 0-255. 
Example 

20 B = PEEK < 3:0006) 
Returns the value stored at location 30000 and assign that value to the variable B. 
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8 4 POKE address value 

This statement sends a 8-bit value to the specified (decimal) memory address 

location. It requires two arguments: address and value. The value must be between 
0-255. 

Example 

10 A = 256 

28 POKE 19600, ft REM SEW VALUE OF A TO ADORES* 19000 

36 B = PEEK (19060) REM RETURNS VALUE AT ADDRESS 19000 TO B 

40 PRINT "THE RESULT IS ".B 

56 END 

fEADV 

.RUN 

THE RESULT IS 250 

8.5 MEM 

Returns the number of unused and unprotected bytes in memory. 

Example 

£00 IF MEM < 180 THEN 700 



When used as a command, it must be accompanied with the PRINT command. That is 
PRINT MEM, to find out the amount of memory not being used to store program, 
variables, strings, arrays, etc. 
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APPENDIX A 

System 80 Reserved Words' 



ABS 

AND 

AST 

ATN 

CDBL 

CHRS 

C1NT 

CLEAR 
CLOSE 

CIS 

CONT 

COS 

DATA 

DEFDBL 

DEFFN 

DEFINT 

DEFSNG 

DEFUSR 

DEFSTR 

DELETE 

DIM 

EDIT 

FLSf- 

END 

FRL 

ERR 

ERROR 

EXP 

FIX 

FOR 

FRfc 

GET 



GOSUB 

GOTO 

IF 

INKFYS 

INP 

INPUT 

INSTR 

INT 

KILL 

LEFTS 

LET 

LSET 

LEN 

LINE 

LIST 

LOAD 

MEM 

MIDS 

NAME 

NEW 

NEXT 

NOT 

ON 

OUT 

PEEK 

POINT 

POKE 

POS 

PRINT 

PLT 



RANDOM 

READ 

REM 

RI-StT 
RESTORE 

RESUME 
REITJRN 
RIGHTS 

RND 

SET 

SON 

SIN 

SQR 

STEP 

STOP 

STRINGS 

STRS 

TAB 

TAN 

THEN 

TROFF 

TRON 

USING 

USR 

VAI 

VARPTR 



*Nonc of these words can be used inside a variable name. 
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APPENDIX B 



ERROR CODES 






CODE 


ABBREVIATION 


ERROR 


I 


NF 


NEXT without FOR 


2 


SN 


Syntax error 


3 


rc; 


Return without GOSUB 


4 


OD 


Out of data 


5 


FC 


Illegal function call 


6 


ov 


Overflow 


7 


OM 


Out of memory 


8 


UL 


Undefined line 


9 


BS 


Subscript out of range 


10 


DD 


Redimensioned array 


H 


/o 


Division by zero 


12 


ID 


Illegal direct 


13 


TM 


Type mismatch 


14 


OS 


Out of string space 


15 


LS 


String loo long 


16 


ST 


String formula too complex 


17 


CN 


Can't continue 


18 


NR 


NO RESUME 


19 


RW 


RESUME without error 


20 


UE 


Unprintable error 


21 


MO 


Missing operand 


22 


FD 


Bad file data 
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Explanation of Error Messages 

NF NEXT without FOR: NEXT is used without a matching FOR statement This error 
may also occur if NEXT variable statements are reversed in a nested loop. 

SN Syntax Error: This is usually the result of incorrect punctuation, open parenthesis, 
an illegal character or a mis-spelled command. 

RG RETURN without GOSUB A RETURN statement was encountered before a 
matching GOSUB was executed 

OD Out of Data A READ or INPUT ff statement was executed with insufficient data 
available. DATA statement may have been left out or all data may have been read 
from tape of DATA 

FC Illegal Function Call An attempt was made to execute an operation using an illegal 
parameter Examples, square root of a negative argument, negative matrix dimension, 
negative or «ro LOG arguments, etc. Or USR call without first POKEing the entry 
point. 

OV Overflow A value input or derived is too large or small for the computer to handle. 

OM Out of Memory. AH available memory has been used or reserved. This may occur with 
very large matrix dimensions, nested branches such as GOTO. GOSUB. and FOR- 
NEXT Loops. 

UL Undefined Line An attempt was made to refeT or branch to a non-existent line 

BS Subscript out ot Range An attempt was made to assign a matrix element with a sub- 
script beyond the DIMensioned range. 

DD Redimensioned Array An attempt was made to DIMension a matrix which had 
previously been dimensioned by DIM or by default statements It is a good idea to 
put all dimension statements at the beginning ot a program 

/O Division by Zero An attempt was made to use a value of zero in the denominator 

ID Illegal Direct The use of INPUT as a direct command 
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TM Type Mismatch. An attempt was made to assign a non-strmg variable to a string or 
vice- versa. 

OS out of String Space The amount ot string space allocated was exceeded 

LS String Too Long A string variable was assigned a string value which exceeded 255 
characters in length 

ST String Formula Too Complex. A string operation was too complex to handle Break 
up the operation into shorter steps 

CN Can't Continue A CONT was issued at a point where no continuablc program exists. 
e.g. after program was EN'Ded or EDITed. 

NR NO RESUME End of program reached in error-trapping mode 

RW RESUME without bRROR: A RESUME was encountered before ON ERROR GOTO 
was executed 

UE Unprintable Error An attempt was made to generate an error using an ERROR 
statement with an invalid code 

MO Missing Operand An operation was attempted without providing one of the required 
operand;.. 

FD Bad File Date Data input from an external source (i.e. tape) was not correct or was 
in improper sequence, etc 
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APPENDIX C 

Control Codes: 1-31 

Code Function 



8 


Backspaces and erases 
current character 


9 


None 


10-13 


Carriage returns 


14 


Turns on cursor 


15 


Turns off cursor 


16-22 


None 


23 


Converts to 32 character 
mode 


24 


Backspace*- Cursor 


25 


Advance — Cursor 


26 


Downward \ linefeed 


27 


Upward | linefeed 


28 


Home, return cursor to 
display position (0.0) 


29 


Move cursor to beginning 
of line 



30 Erases to the end of the line 

3 1 Clear to the end of the frame 
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ASCII Character Codes 32- 1 28 



32 

33 

34 

35 

36 

37 

38 

39 

40 

41 

42 

43 

44 

45 

46 

47 

48 

49 

50 

51 

52 

53 

54 

55 

56 

57 

58 
59 
60 
61 
62 
63 
64 



Character 

space 

i 

•i 

N 

$ 



! 



/ 


I 

I 

5 



I 



< 
> 



Code 

65 
66 
67 
68 
69 
70 

5! 

73 

s 

76 
77 
78 
79 
80 
81 



Character 



Lower case for 
codes 64-95 

Space 
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APPENDIX D 

Program Limits and Memory Overhead 
Ranges 

Integers 32768 + 32767 inclusive 

Single Precision 1 .70 1 4 1 1 F + 38 to + 1 70141 lb + 38 inclusive 

Double Precision -1 70141 1834544556F * 38 to + 1.70141 I834544556E + 38 inclusive 

String Range Up to 255 characters 

Line Numbers Allowed to 65529 inclusive 

Program Line Length Up to 255 characters 

Memory Overhead 

Program lines require 5 bytes minimum, as follows: 

Line Number 2 bytes 

Line Pointer 2 bytes 

Carnage Return I byte 

In addition, each reserved word, operator, variable name, special character and constant 
character requires one byte. 

Dynamic (RUN-iime) Memory Allocation 

Integer variables: 5 bytes each 

(2 lor value. 3 tor variable name) 

Single-precision variables 7 bytes each 

(4 for value. 3 for variable name) 

Double-precision variable 

(8 for value. 3 for variable name I 

String variables: 6 bytes minimum 

(3 for variable name, 3 for stack and variable pointers. 1 lor each character) 

Array variables; 1 2 bytes minimum 

(3 for variable name. 2 for size. I lor number of dimensions. 
2 for each dimension, and 2,3.4. or 8 | depending on array type] 
for each clement in the array) 

Each active FOR-NEXT loop requires 16 bytes. 

Each active (non-returned) GOSUB requires 6 bytes 

Each level of parentheses requires 4 bytes plus 1 2 bytes for each temporary value 
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SYSTEM 80 COMPUTER — NOTE RE KEYBOARD LEGENDS 

Although the Dick Smith System 80 computer is fully software 
compatible with the Tandy TRS-80 Level II computer, its 
keyboard does differ from that of the TRS-80 machine in a few 
minor respects. To avoid possible confusion, these differences 
are clarified below: 

1. NEW LINE key This is functionally identical to the ENTER 

key on the TRS-80 machine, and is used to 
terminate all commands and statement lines. 

2. BACKSPACE key This is functionally identical to the "back 

arrow" (■*- ) key on the TRS-80. 

3. CTRL key This is functionally identical to the "down arrow" 

< + ) key on the TRS-80. 



4. ESC key This is functionally identical to the "up 

(f ) key on the TRS-80. 



arrow 



H 



Note also that the System 80 keyboard does not provide keys 

which are equivalent to the CLEAR or "forward arrow" (-►) keys 

on the TRS-80. However these keys are used on the TRS-80 for 
control functions which are non-essential. 

The CLEAR key on the TRS-80 keyboard simply clears the video 
screen, duplicating the function of the command CLS (except 
that unlike CLS, it cannot be used in programs). As the System 
80 responds to the CLS command, the CLEAR key is not required. 

The "forward arrow" key on the TRS-80 keyboard is used for 

moving the video cursor to the next horizontal tab position. 

While handy on occasions, it again cannot be used in programs, 

so that its absence on the System 80 is of little concern. 
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